;;;; This file contains settings regarding Emacs' appearance.

;; Disable startup screen
(setq inhibit-startup-screen t)
;; Visual bell
(setq ring-bell-function (lambda ()
                           (invert-face 'mode-line)
                           (run-with-timer 0.05 nil 'invert-face 'mode-line)))

;; Show matching parentheses
(show-paren-mode t)

;; Cursor blinking off
(blink-cursor-mode -1)

;; Highlight the current line
(global-hl-line-mode)

;; Display line numbers, relative line numbers
(global-display-line-numbers-mode t)
(setq display-line-numbers-type 'relative)

        
;; Font
(let* ((windows-system (or (eq system-type 'ms-dos) (eq system-type 'windows-nt) (eq system-type 'cygwin)))
       (posix-system (not windows-system)))
  (cond
   (posix-system (set-face-attribute 'default nil :family "Liberation Mono" :height 150))
   (windows-system (set-face-attribute 'default nil :family "Consolas" :height 150))))
